home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / qrdatasu.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  3.0 KB  |  96 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'qrdatasu.pas' rev: 3.00
  6.  
  7. #ifndef qrdatasuHPP
  8. #define qrdatasuHPP
  9. #include <quickrpt.hpp>
  10. #include <FileCtrl.hpp>
  11. #include <DBTables.hpp>
  12. #include <Db.hpp>
  13. #include <ExtCtrls.hpp>
  14. #include <StdCtrls.hpp>
  15. #include <Buttons.hpp>
  16. #include <Dialogs.hpp>
  17. #include <Forms.hpp>
  18. #include <Controls.hpp>
  19. #include <Graphics.hpp>
  20. #include <Classes.hpp>
  21. #include <SysUtils.hpp>
  22. #include <Messages.hpp>
  23. #include <Windows.hpp>
  24. #include <SysInit.hpp>
  25. #include <System.hpp>
  26.  
  27. //-- user supplied -----------------------------------------------------------
  28.  
  29. namespace Qrdatasu
  30. {
  31. //-- type declarations -------------------------------------------------------
  32. class DELPHICLASS TQRDataSetup;
  33. class PASCALIMPLEMENTATION TQRDataSetup : public Forms::TForm 
  34. {
  35.     typedef Forms::TForm inherited;
  36.     
  37. __published:
  38.     Extctrls::TRadioGroup* DataType;
  39.     Stdctrls::TGroupBox* AliasGB;
  40.     Stdctrls::TButton* BrowseButton;
  41.     Stdctrls::TComboBox* DataBaseName;
  42.     Stdctrls::TGroupBox* TableGroup;
  43.     Stdctrls::TComboBox* TableName;
  44.     Stdctrls::TEdit* FilterExpression;
  45.     Stdctrls::TLabel* Label1;
  46.     Stdctrls::TLabel* FilterLabel;
  47.     Stdctrls::TGroupBox* SQLGroup;
  48.     Stdctrls::TMemo* SQL;
  49.     Stdctrls::TButton* OpenSQL;
  50.     Buttons::TBitBtn* OKButton;
  51.     Buttons::TBitBtn* BitBtn2;
  52.     Stdctrls::TLabel* Label3;
  53.     Stdctrls::TComboBox* IndexName;
  54.     void __fastcall DataTypeClick(System::TObject* Sender);
  55.     void __fastcall FormCreate(System::TObject* Sender);
  56.     void __fastcall BrowseButtonClick(System::TObject* Sender);
  57.     void __fastcall DataBaseNameChange(System::TObject* Sender);
  58.     void __fastcall TableNameChange(System::TObject* Sender);
  59.     void __fastcall SQLChange(System::TObject* Sender);
  60.     void __fastcall OKButtonClick(System::TObject* Sender);
  61.     
  62. private:
  63.     Quickrpt::TQuickRep* FReport;
  64.     Dbtables::TTable* TableComp;
  65.     Dbtables::TQuery* QueryComp;
  66.     
  67. protected:
  68.     void __fastcall GetEditValues(void);
  69.     void __fastcall SetReport(Quickrpt::TQuickRep* Value);
  70.     void __fastcall SetData(void);
  71.     
  72. public:
  73.     __property Quickrpt::TQuickRep* QuickRep = {read=FReport, write=SetReport};
  74. public:
  75.     /* TCustomForm.Create */ __fastcall virtual TQRDataSetup(Classes::TComponent* AOwner) : Forms::TForm(
  76.         AOwner) { }
  77.     /* TCustomForm.CreateNew */ __fastcall TQRDataSetup(Classes::TComponent* AOwner, int Dummy) : Forms::
  78.         TForm(AOwner, Dummy) { }
  79.     /* TCustomForm.Destroy */ __fastcall virtual ~TQRDataSetup(void) { }
  80.     
  81. public:
  82.     /* TWinControl.CreateParented */ __fastcall TQRDataSetup(HWND ParentWindow) : Forms::TForm(ParentWindow
  83.         ) { }
  84.     
  85. };
  86.  
  87. //-- var, const, procedure ---------------------------------------------------
  88. extern PACKAGE TQRDataSetup* QRDataSetup;
  89.  
  90. }    /* namespace Qrdatasu */
  91. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  92. using namespace Qrdatasu;
  93. #endif
  94. //-- end unit ----------------------------------------------------------------
  95. #endif    // qrdatasu
  96.